home *** CD-ROM | disk | FTP | other *** search
/ Adobe Digital Video Collection / Digital Video Collection CD.iso / After Effects 5.5 / MMScriptJpn.Cab / F115725_spring.mm < prev    next >
Encoding:
Text File  |  2001-12-07  |  1.3 KB  |  38 lines
  1. // One spring - version 1.2
  2.  
  3. // é▒é╠âXâNâèâvâgé═üAâ|âbâvâAâbâvâüâjâàü[é╔ò\Īé│éΩéΘéQé┬é╠âîâCâäü[è╘é≡âXâvâèâôâOé┼îïé╤òté»é▄é╖üB
  4. // âîâCâäü[éPé═î│é╠âéü[âVâçâôé≡ò█Ä¥é╡üAâîâCâäü[éQé¬âXâvâèâôâOé┼âîâCâäü[éPé╔îïé╤òté»éτéΩé▄é╖üB
  5.  
  6. //      âîâCâäü[                                            âvâìâpâeâB               â`âââôâlâï
  7. //      ------                                              ----------               --------
  8. // 1: ê┌ô«é╖éΘâîâCâäü[                                        Ägùpé╡é╚éó               Ägùpé╡é╚éó
  9. // 2: âXâvâèâôâOé┼éPö╘û┌é╠âîâCâäü[é╞îïé╤òté»éτéΩéΘâîâCâäü[  Ägùpé╡é╚éó               Ägùpé╡é╚éó
  10.  
  11.  
  12. if (time() == start_time) {
  13.    rest_length = 10;                            // ù═é≡ë┴éªé─éóé╚éóé╞é½é╠âXâvâèâôâOé╠Æ╖é│üiâsâNâZâïÆPê╩üj
  14.    damp = 0.95;                                        // î╕Éèù═üiéOüüûÇÄCù═û│î└æσüAéPüüûÇÄCù═é╚é╡üj
  15.  
  16.    p1 = value(pop_layer(1), position);
  17.    p2 = value(pop_layer(2), position);
  18.  
  19.    last_p1 = tmap(time() - step_time, value(pop_layer(1), position));
  20.    last_p2 = tmap(time() - step_time, value(pop_layer(2), position)); 
  21.  
  22.    v1 = (p1 - last_p1);
  23.    v2 = (p2 - last_p2);
  24. } else {
  25.   p1 = value(pop_layer(1), position);
  26.  
  27.    delta = p2 - p1;
  28.    n_delta = normalize(delta);
  29.  
  30.    a = 2 * n_delta * (length(delta) - rest_length) * step_time;
  31.  
  32.     v2 = (v2 - a) * damp;
  33.   v1 = (v1 + a) * damp;
  34.  
  35.    p1 = p1 + v1;
  36.    p2 = p2 + v2;
  37. }
  38. value(pop_layer(2), position) = p2;